A$=GETS$("SYSTEXT",1)
GEAR LOAD "多色フレーム","b:福原.tif"
DSP SHOW "多色フレーム"
CLRF "HP"
CLRF "L"
CLRF "怪物"
CLRF "teki"
CLRF "ｱﾄ"
PUTS "HP",GETS$("SYSTEXT",2),1
PUTS "L",GETS$("SYSTEXT",3),1
PUTS "teki",GETS$("SYSTEXT",4),1
PUTS "ｱﾄ",GETS$("SYSTEXT",5),1
PUTS "怪物",STR$(1000),1
GO "音楽1"